Best of The Best 5: Deep Tush 2/Best of the Best - Volume 5 - Deep Tush 2.iso/mac/TUSH8.DIR/00115_Script_115

Text File | 1994-11-30 | 637b | 25 lines

on volUp
  if the SoundLevel = 7 then exit
  set the SoundLevel to the SoundLevel + 1
end volUp

on volDn
  if the SoundLevel = 0 then exit
  set the SoundLevel to the SoundLevel - 1
end volDn

on butns
  global action,PauseState,auto
  set chan=the clickon
  set button=the name of cast(the castnum of sprite the clickon)
  set upbut=button
  set len=(the number of chars in button)
  put "C" into char len of button
  set the castnum of sprite chan to the number of cast button
  updatestage
  repeat while the stillDown
    if rollover (chan) = false then exit
  end repeat
  do action
end butns